home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / dbms_mag / 9101 / head3.jan < prev    next >
Text File  |  1990-10-30  |  544b  |  11 lines

  1.  
  2. @ ... SAY "Enter Customer name -> " ;
  3.       GET CustName VALID IF(ValidCust(CustName), ;
  4.                                IF(NoOpenTrans(CustName), ;
  5.                                       NoUnPaid(CustName),.F.),.F.)
  6. If we get to NoUnPaid(), then we simply  ___/            /    /  
  7. return its return value                                 /    /
  8.                                                        /    /
  9.        This .F. is returned when NoOpenTrans() fails__/    /
  10.              This .F. is returned when ValidCust() fails__/     
  11.